home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Magnum One
/
Magnum One (Mid-American Digital) (Disc Manufacturing).iso
/
d12
/
rhstdlib.arc
/
RMVITEM.ASM
< prev
next >
Wrap
Assembly Source File
|
1990-10-20
|
614b
|
43 lines
stdlib segment para public 'slcode'
assume cs:stdlib
;
;
; RmvItem- Locates and removes the first (next) character in the set.
;
; inputs:
;
; ES:DI- Points at the set to search through.
;
; outputs:
;
; AL- Next available character in set (zero if set is empty).
;
;
public sl_RmvItem
;
sl_RmvItem proc far
push cx
push di
;
mov al, es:[di]
mov cx, 256
add di, 7
NextLp: inc di
test al, es:[di]
loopz NextLp
jz NoMask
not al
and es:[di], al
inc cx
;
NoMask: neg cx
mov al, cl
pop di
pop cx
ret
sl_RmvItem endp
;
;
stdlib ends
end